object FInvoiceAdd: TFInvoiceAdd
  Left = 0
  Top = 0
  BorderStyle = bsNone
  ClientHeight = 878
  ClientWidth = 1314
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -19
  Font.Name = 'Segoe UI Light'
  Font.Style = []
  OldCreateOrder = False
  WindowState = wsMaximized
  OnActivate = FormActivate
  PixelsPerInch = 96
  TextHeight = 25
  object AdvPanel1: TAdvPanel
    Left = 0
    Top = 0
    Width = 1314
    Height = 193
    Align = alTop
    BevelOuter = bvNone
    Color = 16643823
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    UseDockManager = True
    Version = '2.2.0.2'
    BorderColor = 13087391
    Caption.Color = 16643823
    Caption.ColorTo = 15784647
    Caption.Font.Charset = DEFAULT_CHARSET
    Caption.Font.Color = 5978398
    Caption.Font.Height = -11
    Caption.Font.Name = 'Tahoma'
    Caption.Font.Style = []
    Caption.GradientDirection = gdVertical
    Caption.Indent = 2
    Caption.ShadeLight = 255
    CollapsColor = clNone
    CollapsDelay = 0
    ColorTo = 15784647
    ShadowColor = clBlack
    ShadowOffset = 0
    StatusBar.BorderColor = 16643823
    StatusBar.BorderStyle = bsSingle
    StatusBar.Font.Charset = DEFAULT_CHARSET
    StatusBar.Font.Color = 5978398
    StatusBar.Font.Height = -11
    StatusBar.Font.Name = 'Tahoma'
    StatusBar.Font.Style = []
    StatusBar.Color = 16643823
    StatusBar.ColorTo = 15784647
    StatusBar.GradientDirection = gdVertical
    Styler = AdvPanelStyler1
    Text = ''
    FullHeight = 200
    object cxGroupBox1: TcxGroupBox
      Left = 16
      Top = 8
      Caption = ' Add New Invoice '
      TabOrder = 0
      Height = 177
      Width = 1089
      object AdvPanel2: TAdvPanel
        Left = 2
        Top = 18
        Width = 1085
        Height = 157
        Align = alClient
        BevelOuter = bvNone
        Color = 16643823
        Enabled = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        UseDockManager = True
        Version = '2.2.0.2'
        BorderColor = 13087391
        Caption.Color = 16643823
        Caption.ColorTo = 15784647
        Caption.Font.Charset = DEFAULT_CHARSET
        Caption.Font.Color = 5978398
        Caption.Font.Height = -11
        Caption.Font.Name = 'Tahoma'
        Caption.Font.Style = []
        Caption.GradientDirection = gdVertical
        Caption.Indent = 2
        Caption.ShadeLight = 255
        CollapsColor = clNone
        CollapsDelay = 0
        ColorTo = 15784647
        ShadowColor = clBlack
        ShadowOffset = 0
        StatusBar.BorderColor = 16643823
        StatusBar.BorderStyle = bsSingle
        StatusBar.Font.Charset = DEFAULT_CHARSET
        StatusBar.Font.Color = 5978398
        StatusBar.Font.Height = -11
        StatusBar.Font.Name = 'Tahoma'
        StatusBar.Font.Style = []
        StatusBar.Color = 16643823
        StatusBar.ColorTo = 15784647
        StatusBar.GradientDirection = gdVertical
        Styler = AdvPanelStyler1
        Text = ''
        FullHeight = 200
        object Label1: TLabel
          Left = 20
          Top = 13
          Width = 58
          Height = 13
          Caption = 'Admission #'
        end
        object Label2: TLabel
          Left = 20
          Top = 40
          Width = 23
          Height = 13
          Caption = 'Date'
        end
        object Label3: TLabel
          Left = 20
          Top = 94
          Width = 39
          Height = 13
          Caption = 'First Ins'
        end
        object Label4: TLabel
          Left = 20
          Top = 121
          Width = 53
          Height = 13
          Caption = 'Second Ins'
          Visible = False
        end
        object Label5: TLabel
          Left = 20
          Top = 67
          Width = 53
          Height = 13
          Caption = 'Billing Type'
        end
        object Label6: TLabel
          Left = 375
          Top = 94
          Width = 55
          Height = 13
          Caption = 'Percentage'
        end
        object Label7: TLabel
          Left = 375
          Top = 121
          Width = 55
          Height = 13
          Caption = 'Percentage'
          Visible = False
        end
        object Label8: TLabel
          Left = 528
          Top = 94
          Width = 24
          Height = 13
          Caption = 'Total'
        end
        object Label9: TLabel
          Left = 528
          Top = 121
          Width = 24
          Height = 13
          Caption = 'Total'
          Visible = False
        end
        object Label10: TLabel
          Left = 784
          Top = 94
          Width = 124
          Height = 13
          Caption = 'Total Payed By Encounter'
        end
        object cxDBLookupComboBox1: TcxDBLookupComboBox
          Left = 120
          Top = 10
          DataBinding.DataField = 'encounter_nr'
          DataBinding.DataSource = DMInvoice.DShis_encounter_invoice
          Properties.KeyFieldNames = 'encounter_nr'
          Properties.ListColumns = <
            item
              FieldName = 'encounter_nr'
            end>
          Properties.ListSource = DMPerson.DShis_assign_encounter_person_all
          Properties.OnEditValueChanged = cxDBLookupComboBox1PropertiesEditValueChanged
          TabOrder = 0
          Width = 145
        end
        object cxDBDateEdit1: TcxDBDateEdit
          Left = 120
          Top = 37
          DataBinding.DataField = 'invoice_date'
          DataBinding.DataSource = DMInvoice.DShis_encounter_invoice
          TabOrder = 1
          Width = 145
        end
        object cxDBLookupComboBox2: TcxDBLookupComboBox
          Left = 120
          Top = 91
          DataBinding.DataField = 'first_ins'
          DataBinding.DataSource = DMInvoice.DShis_encounter_invoice
          Properties.KeyFieldNames = 'id'
          Properties.ListColumns = <
            item
              FieldName = 'ins_comb'
            end>
          Properties.ListSource = DMPerson.DShis_insurance_combine
          TabOrder = 2
          Width = 249
        end
        object cxDBLookupComboBox3: TcxDBLookupComboBox
          Left = 120
          Top = 118
          DataBinding.DataField = 'second_ins'
          DataBinding.DataSource = DMInvoice.DShis_encounter_invoice
          Properties.KeyFieldNames = 'id'
          Properties.ListColumns = <
            item
              FieldName = 'ins_comb'
            end>
          Properties.ListSource = DMPerson.DShis_insurance_combine
          TabOrder = 3
          Visible = False
          Width = 249
        end
        object cxDBLookupComboBox4: TcxDBLookupComboBox
          Left = 120
          Top = 64
          DataBinding.DataField = 'insurance_class_nr'
          DataBinding.DataSource = DMInvoice.DShis_encounter_invoice
          Enabled = False
          Properties.KeyFieldNames = 'class_nr'
          Properties.ListColumns = <
            item
              FieldName = 'name'
            end>
          Properties.ListSource = DMPerson.DScare_class_insurance
          TabOrder = 4
          Width = 249
        end
        object cxDBSpinEdit1: TcxDBSpinEdit
          Left = 446
          Top = 91
          DataBinding.DataField = 'first_ins_perc'
          DataBinding.DataSource = DMInvoice.DShis_encounter_invoice
          Properties.Increment = 5.000000000000000000
          TabOrder = 5
          Width = 51
        end
        object cxDBSpinEdit2: TcxDBSpinEdit
          Left = 446
          Top = 118
          DataBinding.DataField = 'second_ins_perc'
          DataBinding.DataSource = DMInvoice.DShis_encounter_invoice
          Properties.AssignedValues.MinValue = True
          Properties.Increment = 5.000000000000000000
          Properties.MaxValue = 100.000000000000000000
          Properties.Nullstring = 'null'
          TabOrder = 6
          Visible = False
          Width = 51
        end
        object cxDBCurrencyEdit1: TcxDBCurrencyEdit
          Left = 584
          Top = 91
          DataBinding.DataField = 'total_to_pay_first_ins'
          DataBinding.DataSource = DMInvoice.DShis_encounter_invoice
          Enabled = False
          Properties.DisplayFormat = ',0.00;(,0.00)'
          TabOrder = 7
          Width = 185
        end
        object cxDBCurrencyEdit2: TcxDBCurrencyEdit
          Left = 584
          Top = 118
          DataBinding.DataField = 'total_to_pay_second_ins'
          DataBinding.DataSource = DMInvoice.DShis_encounter_invoice
          Enabled = False
          Properties.DecimalPlaces = 4
          Properties.DisplayFormat = ',0.00;(,0.00)'
          TabOrder = 8
          Visible = False
          Width = 185
        end
        object cxDBCurrencyEdit3: TcxDBCurrencyEdit
          Left = 914
          Top = 91
          DataBinding.DataField = 'total_to_pay_private'
          DataBinding.DataSource = DMInvoice.DShis_encounter_invoice
          Enabled = False
          Properties.DecimalPlaces = 4
          Properties.DisplayFormat = ',0.00;(,0.00)'
          TabOrder = 9
          Width = 121
        end
      end
    end
    object Button1: TButton
      Left = 1128
      Top = 8
      Width = 75
      Height = 25
      Caption = 'Print Invoice'
      TabOrder = 1
      OnClick = Button1Click
    end
  end
  object DBAdvGlowNavigator1: TDBAdvGlowNavigator
    Left = 0
    Top = 193
    Width = 1314
    Height = 36
    DataSource = DMInvoice.DShis_encounter_invoice
    VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbEdit, nbPost, nbCancel, nbRefresh]
    Align = alTop
    Appearance.ColorChecked = 16111818
    Appearance.ColorCheckedTo = 16367008
    Appearance.ColorDisabled = 15921906
    Appearance.ColorDisabledTo = 15921906
    Appearance.ColorDown = 16111818
    Appearance.ColorDownTo = 16367008
    Appearance.ColorHot = 16117985
    Appearance.ColorHotTo = 16372402
    Appearance.ColorMirrorHot = 16107693
    Appearance.ColorMirrorHotTo = 16775412
    Appearance.ColorMirrorDown = 16102556
    Appearance.ColorMirrorDownTo = 16768988
    Appearance.ColorMirrorChecked = 16102556
    Appearance.ColorMirrorCheckedTo = 16768988
    Appearance.ColorMirrorDisabled = 11974326
    Appearance.ColorMirrorDisabledTo = 15921906
    DeleteDisabled = False
    InsertDisabled = False
    GlyphCustomSize = 0
    Orientation = noHorizontal
    TabOrder = 1
    OnBtnPrior = DBAdvGlowNavigator1BtnPrior
    OnBtnNext = DBAdvGlowNavigator1BtnNext
    OnBtnFirst = DBAdvGlowNavigator1BtnFirst
    OnBtnLast = DBAdvGlowNavigator1BtnLast
    OnBtnInsert = DBAdvGlowNavigator1BtnInsert
    OnBtnEdit = DBAdvGlowNavigator1BtnEdit
    OnBtnCancel = DBAdvGlowNavigator1BtnCancel
    OnBtnPost = DBAdvGlowNavigator1BtnPost
    OnBtnRefresh = DBAdvGlowNavigator1BtnRefresh
    Version = '1.1.4.0'
  end
  object cxGrid1: TcxGrid
    Left = 0
    Top = 229
    Width = 1314
    Height = 611
    Align = alClient
    TabOrder = 2
    LookAndFeel.SkinName = 'Office2010Blue'
    object cxGrid1DBTableView1: TcxGridDBTableView
      Navigator.Buttons.CustomButtons = <>
      DataController.DataSource = DMInvoice.DShis_encounter_invoice_details
      DataController.Summary.DefaultGroupSummaryItems = <>
      DataController.Summary.FooterSummaryItems = <
        item
          Format = ',0.00;(,0.00)'
          Kind = skSum
          FieldName = 'price_ins1'
          Column = cxGrid1DBTableView1price_ins1
        end
        item
          Format = ',0.00;(,0.00)'
          Kind = skSum
          Column = cxGrid1DBTableView1price_ins2
        end
        item
          Format = ',0.00;(,0.00)'
          Kind = skSum
          Column = cxGrid1DBTableView1private
        end
        item
          Kind = skCount
          Column = cxGrid1DBTableView1changed
        end>
      DataController.Summary.SummaryGroups = <>
      OptionsView.ColumnAutoWidth = True
      OptionsView.Footer = True
      OptionsView.GroupByHeaderLayout = ghlHorizontal
      object cxGrid1DBTableView1changed: TcxGridDBColumn
        Caption = 'Change'
        DataBinding.FieldName = 'changed'
        PropertiesClassName = 'TcxCheckBoxProperties'
        Properties.AllowGrayed = True
        Properties.ValueChecked = '1'
        Properties.ValueGrayed = '2'
        Properties.ValueUnchecked = '0'
        Properties.OnEditValueChanged = cxGrid1DBTableView1changedPropertiesEditValueChanged
        Width = 107
      end
      object cxGrid1DBTableView1batch_date: TcxGridDBColumn
        Caption = 'Date'
        DataBinding.FieldName = 'batch_date'
        Visible = False
        GroupIndex = 1
        Width = 91
      end
      object cxGrid1DBTableView1item_id: TcxGridDBColumn
        Caption = 'Item'
        DataBinding.FieldName = 'item_name'
        Options.Editing = False
        Width = 96
      end
      object cxGrid1DBTableView1coef_id: TcxGridDBColumn
        Caption = 'Coef'
        DataBinding.FieldName = 'coef_id'
        PropertiesClassName = 'TcxLookupComboBoxProperties'
        Properties.KeyFieldNames = 'coef_id'
        Properties.ListColumns = <
          item
            FieldName = 'coef_label'
          end>
        Options.Editing = False
        Width = 82
      end
      object cxGrid1DBTableView1coef_value: TcxGridDBColumn
        Caption = 'Coef Value'
        DataBinding.FieldName = 'coef_value'
        Options.Editing = False
        Width = 95
      end
      object cxGrid1DBTableView1category: TcxGridDBColumn
        Caption = 'Category'
        DataBinding.FieldName = 'category'
        Visible = False
        GroupIndex = 0
      end
      object cxGrid1DBTableView1price_ins1: TcxGridDBColumn
        Caption = 'Ins 1 Price'
        DataBinding.FieldName = 'price_ins1'
        PropertiesClassName = 'TcxCurrencyEditProperties'
        Properties.DecimalPlaces = 4
        Properties.DisplayFormat = ',0.00;(,0.00)'
        Width = 87
      end
      object cxGrid1DBTableView1price_ins2: TcxGridDBColumn
        Caption = 'Ins 2 Price'
        DataBinding.FieldName = 'price_ins2'
        PropertiesClassName = 'TcxCurrencyEditProperties'
        Properties.DecimalPlaces = 4
        Properties.DisplayFormat = ',0.00;(,0.00)'
        Width = 88
      end
      object cxGrid1DBTableView1emergency: TcxGridDBColumn
        Caption = 'Emergency'
        DataBinding.FieldName = 'emergency'
        PropertiesClassName = 'TcxCheckBoxProperties'
        Properties.ValueChecked = '1'
        Properties.ValueUnchecked = '0'
        Width = 95
      end
      object cxGrid1DBTableView1private: TcxGridDBColumn
        Caption = 'Private'
        DataBinding.FieldName = 'private'
        Width = 60
      end
      object cxGrid1DBTableView1qty: TcxGridDBColumn
        Caption = 'Rang'
        DataBinding.FieldName = 'rang'
        Width = 34
      end
    end
    object cxGrid1Level1: TcxGridLevel
      GridView = cxGrid1DBTableView1
    end
  end
  object AdvPanel3: TAdvPanel
    Left = 0
    Top = 840
    Width = 1314
    Height = 38
    Align = alBottom
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -19
    Font.Name = 'Segoe UI Light'
    Font.Style = []
    ParentFont = False
    TabOrder = 4
    UseDockManager = True
    Version = '2.2.0.2'
    Caption.Color = clHighlight
    Caption.ColorTo = clNone
    Caption.Font.Charset = DEFAULT_CHARSET
    Caption.Font.Color = clWindowText
    Caption.Font.Height = -19
    Caption.Font.Name = 'Segoe UI Light'
    Caption.Font.Style = []
    StatusBar.Font.Charset = DEFAULT_CHARSET
    StatusBar.Font.Color = clWindowText
    StatusBar.Font.Height = -11
    StatusBar.Font.Name = 'Tahoma'
    StatusBar.Font.Style = []
    Text = ''
    FullHeight = 200
    object DBAdvGlowNavigator2: TDBAdvGlowNavigator
      Left = 1
      Top = 1
      Width = 1312
      Height = 36
      DataSource = DMInvoice.DShis_encounter_invoice_details
      VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbRefresh]
      Align = alClient
      Appearance.ColorChecked = 16111818
      Appearance.ColorCheckedTo = 16367008
      Appearance.ColorDisabled = 15921906
      Appearance.ColorDisabledTo = 15921906
      Appearance.ColorDown = 16111818
      Appearance.ColorDownTo = 16367008
      Appearance.ColorHot = 16117985
      Appearance.ColorHotTo = 16372402
      Appearance.ColorMirrorHot = 16107693
      Appearance.ColorMirrorHotTo = 16775412
      Appearance.ColorMirrorDown = 16102556
      Appearance.ColorMirrorDownTo = 16768988
      Appearance.ColorMirrorChecked = 16102556
      Appearance.ColorMirrorCheckedTo = 16768988
      Appearance.ColorMirrorDisabled = 11974326
      Appearance.ColorMirrorDisabledTo = 15921906
      DeleteDisabled = False
      InsertDisabled = False
      GlyphCustomSize = 0
      Orientation = noHorizontal
      TabOrder = 0
      OnBtnRefresh = DBAdvGlowNavigator2BtnRefresh
      Version = '1.1.4.0'
    end
  end
  object AdvPanelStyler1: TAdvPanelStyler
    Tag = 0
    Settings.AnchorHint = False
    Settings.BevelInner = bvNone
    Settings.BevelOuter = bvNone
    Settings.BevelWidth = 1
    Settings.BorderColor = 13087391
    Settings.BorderShadow = False
    Settings.BorderStyle = bsNone
    Settings.BorderWidth = 0
    Settings.CanMove = False
    Settings.CanSize = False
    Settings.Caption.Color = 16643823
    Settings.Caption.ColorTo = 15784647
    Settings.Caption.Font.Charset = DEFAULT_CHARSET
    Settings.Caption.Font.Color = 5978398
    Settings.Caption.Font.Height = -11
    Settings.Caption.Font.Name = 'Tahoma'
    Settings.Caption.Font.Style = []
    Settings.Caption.GradientDirection = gdVertical
    Settings.Caption.Indent = 2
    Settings.Caption.ShadeLight = 255
    Settings.Collaps = False
    Settings.CollapsColor = clNone
    Settings.CollapsDelay = 0
    Settings.CollapsSteps = 0
    Settings.Color = 16643823
    Settings.ColorTo = 15784647
    Settings.ColorMirror = clNone
    Settings.ColorMirrorTo = clNone
    Settings.Cursor = crDefault
    Settings.Font.Charset = DEFAULT_CHARSET
    Settings.Font.Color = clBlack
    Settings.Font.Height = -11
    Settings.Font.Name = 'Tahoma'
    Settings.Font.Style = []
    Settings.FixedTop = False
    Settings.FixedLeft = False
    Settings.FixedHeight = False
    Settings.FixedWidth = False
    Settings.Height = 120
    Settings.Hover = False
    Settings.HoverColor = clNone
    Settings.HoverFontColor = clNone
    Settings.Indent = 0
    Settings.ShadowColor = clBlack
    Settings.ShadowOffset = 0
    Settings.ShowHint = False
    Settings.ShowMoveCursor = False
    Settings.StatusBar.BorderColor = 16643823
    Settings.StatusBar.BorderStyle = bsSingle
    Settings.StatusBar.Font.Charset = DEFAULT_CHARSET
    Settings.StatusBar.Font.Color = 5978398
    Settings.StatusBar.Font.Height = -11
    Settings.StatusBar.Font.Name = 'Tahoma'
    Settings.StatusBar.Font.Style = []
    Settings.StatusBar.Color = 16643823
    Settings.StatusBar.ColorTo = 15784647
    Settings.StatusBar.GradientDirection = gdVertical
    Settings.TextVAlign = tvaTop
    Settings.TopIndent = 0
    Settings.URLColor = clBlue
    Settings.Width = 0
    Style = psOffice2010Blue
    Left = 1144
    Top = 80
  end
  object DShis_encounter_invoice_details_sejour: TfrxDBDataset
    UserName = 'DShis_encounter_invoice_details_sejour'
    CloseDataSource = False
    FieldAliases.Strings = (
      
        'his_encounter_invoice_details_id=his_encounter_invoice_details_i' +
        'd'
      'his_encounter_invoice_id=his_encounter_invoice_id'
      'item_id=item_id'
      'item_name=item_name'
      'coef_id=coef_id'
      'coef_value=coef_value'
      'qty=qty'
      'category=category'
      'batch_nr=batch_nr'
      'batch_date=batch_date'
      'price_ins1=price_ins1'
      'price_ins2=price_ins2'
      'emergency=emergency'
      'private=private'
      'rang=rang'
      'changed=changed')
    DataSource = DMInvoice.DShis_encounter_invoice_details_sejour
    BCDToCurrency = False
    Left = 120
    Top = 576
  end
  object DShis_encounter_invoice: TfrxDBDataset
    UserName = 'DShis_encounter_invoice'
    CloseDataSource = False
    DataSource = DMInvoice.DShis_encounter_invoice
    BCDToCurrency = False
    Left = 120
    Top = 528
  end
  object ReInvoice: TfrxReport
    Version = '4.15'
    DotMatrixReport = True
    IniFile = '\Software\Fast Reports'
    PreviewOptions.Buttons = [pbPrint, pbLoad, pbSave, pbExport, pbZoom, pbFind, pbOutline, pbPageSetup, pbTools, pbEdit, pbNavigator, pbExportQuick]
    PreviewOptions.Zoom = 1.000000000000000000
    PrintOptions.Printer = 'Default'
    PrintOptions.PrintOnSheet = 0
    ReportOptions.CreateDate = 41708.491162835600000000
    ReportOptions.LastChange = 41716.642004421300000000
    ScriptLanguage = 'PascalScript'
    ScriptText.Strings = (
      ''
      'begin'
      ''
      'end.')
    Left = 456
    Top = 528
    Datasets = <
      item
        DataSet = DShis_encounter_all_info_all
        DataSetName = 'DShis_encounter_all_info_all'
      end
      item
        DataSet = DShis_encounter_invoice
        DataSetName = 'DShis_encounter_invoice'
      end
      item
        DataSet = DShis_encounter_invoice_details_bloc
        DataSetName = 'DShis_encounter_invoice_details_bloc'
      end
      item
        DataSet = DShis_encounter_invoice_details_divers
        DataSetName = 'DShis_encounter_invoice_details_divers'
      end
      item
        DataSet = DShis_encounter_invoice_details_hono_details
        DataSetName = 'DShis_encounter_invoice_details_hono_details'
      end
      item
        DataSet = DShis_encounter_invoice_details_lab
        DataSetName = 'DShis_encounter_invoice_details_lab'
      end
      item
        DataSet = DShis_encounter_invoice_details_pharma
        DataSetName = 'DShis_encounter_invoice_details_pharma'
      end
      item
        DataSet = DShis_encounter_invoice_details_radio
        DataSetName = 'DShis_encounter_invoice_details_radio'
      end
      item
        DataSet = DShis_encounter_invoice_details_sejour
        DataSetName = 'DShis_encounter_invoice_details_sejour'
      end>
    Variables = <>
    Style = <>
    object Data: TfrxDataPage
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -7
      Font.Name = 'Arial'
      Font.Style = []
      Height = 1000.000000000000000000
      Width = 1000.000000000000000000
    end
    object Page1: TfrxDMPPage
      PaperWidth = 210.819863845504600000
      PaperHeight = 296.862308276425900000
      PaperSize = 9
      LeftMargin = 2.539998359584390000
      RightMargin = 2.539998359584390000
      TopMargin = 4.497913761764030000
      BottomMargin = 4.497913761764030000
      MirrorMargins = True
      EndlessHeight = True
      EndlessWidth = True
      LargeDesignHeight = True
      FontStyle = [fsxCondensed]
      object ReportTitle1: TfrxReportTitle
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
        Top = 17.000000000000000000
        Width = 777.600000000000000000
      end
      object PageHeader1: TfrxPageHeader
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        Height = 255.000000000000000000
        ParentFont = False
        Top = 34.000000000000000000
        Width = 777.600000000000000000
        object DMPMemo1: TfrxDMPMemoView
          Left = 624.000000000000000000
          Top = 17.000000000000000000
          Width = 57.600000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          FontStyle = [fsx12cpi]
          Frame.Style = fsDot
          Memo.UTF8W = (
            'Date ')
          ParentFont = False
          TruncOutboundText = False
        end
        object DMPMemo2: TfrxDMPMemoView
          Left = 681.600000000000000000
          Top = 17.000000000000000000
          Width = 86.400000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          FontStyle = [fsx12cpi]
          Frame.Style = fsDot
          Memo.UTF8W = (
            '[Date]')
          ParentFont = False
          TruncOutboundText = False
        end
        object DMPMemo3: TfrxDMPMemoView
          Left = 259.200000000000000000
          Top = 34.000000000000000000
          Width = 115.200000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          Frame.Style = fsDot
          Memo.UTF8W = (
            'Facture No. ')
          TruncOutboundText = False
        end
        object DMPMemo4: TfrxDMPMemoView
          Left = 259.200000000000000000
          Top = 51.000000000000000000
          Width = 115.200000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          FontStyle = [fsx12cpi]
          Frame.Style = fsDot
          Memo.UTF8W = (
            'Patient No. ')
          ParentFont = False
          TruncOutboundText = False
        end
        object DShis_encounter_invoicehis_encounter_invoice_id: TfrxDMPMemoView
          Left = 374.400000000000000000
          Top = 34.000000000000000000
          Width = 76.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          DataField = 'his_encounter_invoice_id'
          DataSet = DShis_encounter_invoice
          DataSetName = 'DShis_encounter_invoice'
          FontStyle = [fsx12cpi]
          Frame.Style = fsDot
          Memo.UTF8W = (
            '[DShis_encounter_invoice."his_encounter_invoice_id"]')
          ParentFont = False
          TruncOutboundText = False
        end
        object DShis_encounter_all_info_allencounter_nr: TfrxDMPMemoView
          Left = 374.400000000000000000
          Top = 51.000000000000000000
          Width = 76.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          DataField = 'encounter_nr'
          DataSet = DShis_encounter_all_info_all
          DataSetName = 'DShis_encounter_all_info_all'
          FontStyle = [fsx12cpi]
          Frame.Style = fsDot
          Memo.UTF8W = (
            '[DShis_encounter_all_info_all."encounter_nr"]')
          ParentFont = False
          TruncOutboundText = False
        end
        object DMPMemo5: TfrxDMPMemoView
          Left = 9.600000000000000000
          Top = 85.000000000000000000
          Width = 115.200000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          FontStyle = [fsxCondensed]
          Frame.Style = fsDot
          Memo.UTF8W = (
            'Doit M.')
          ParentFont = False
          TruncOutboundText = False
        end
        object DMPMemo6: TfrxDMPMemoView
          Left = 9.600000000000000000
          Top = 102.000000000000000000
          Width = 115.200000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          FontStyle = [fsx12cpi]
          Frame.Style = fsDot
          Memo.UTF8W = (
            'Rentree')
          ParentFont = False
          TruncOutboundText = False
        end
        object DMPMemo7: TfrxDMPMemoView
          Left = 9.600000000000000000
          Top = 119.000000000000000000
          Width = 115.200000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          FontStyle = [fsx12cpi]
          Frame.Style = fsDot
          Memo.UTF8W = (
            'Soignant')
          ParentFont = False
          TruncOutboundText = False
        end
        object DMPMemo8: TfrxDMPMemoView
          Left = 9.600000000000000000
          Top = 136.000000000000000000
          Width = 115.200000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          FontStyle = [fsx12cpi]
          Frame.Style = fsDot
          Memo.UTF8W = (
            'Couverture')
          ParentFont = False
          TruncOutboundText = False
        end
        object DMPMemo10: TfrxDMPMemoView
          Left = 9.600000000000000000
          Top = 170.000000000000000000
          Width = 115.200000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          FontStyle = [fsx12cpi]
          Frame.Style = fsDot
          Memo.UTF8W = (
            'Dossier No.')
          ParentFont = False
          TruncOutboundText = False
        end
        object DMPMemo11: TfrxDMPMemoView
          Left = 9.600000000000000000
          Top = 187.000000000000000000
          Width = 115.200000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          FontStyle = [fsx12cpi]
          Frame.Style = fsDot
          Memo.UTF8W = (
            'Tel./Adr.')
          ParentFont = False
          TruncOutboundText = False
        end
        object DMPMemo12: TfrxDMPMemoView
          Left = 249.600000000000000000
          Top = 102.000000000000000000
          Width = 76.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          FontStyle = [fsx12cpi]
          Frame.Style = fsDot
          Memo.UTF8W = (
            'Sortie')
          ParentFont = False
          TruncOutboundText = False
        end
        object DMPMemo13: TfrxDMPMemoView
          Left = 326.400000000000000000
          Top = 102.000000000000000000
          Width = 86.400000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          FontStyle = [fsx12cpi]
          Frame.Style = fsDot
          Memo.UTF8W = (
            '[Date]')
          ParentFont = False
          TruncOutboundText = False
        end
        object DShis_encounter_all_info_allFullName: TfrxDMPMemoView
          Left = 124.800000000000000000
          Top = 85.000000000000000000
          Width = 403.200000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          DataField = 'Full Name'
          DataSet = DShis_encounter_all_info_all
          DataSetName = 'DShis_encounter_all_info_all'
          FontStyle = [fsx12cpi]
          Frame.Style = fsDot
          Memo.UTF8W = (
            '[DShis_encounter_all_info_all."Full Name"]')
          ParentFont = False
          TruncOutboundText = False
        end
        object DShis_encounter_all_info_allencounter_date: TfrxDMPMemoView
          Left = 124.800000000000000000
          Top = 102.000000000000000000
          Width = 96.000000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          DataSet = DShis_encounter_all_info_all
          DataSetName = 'DShis_encounter_all_info_all'
          DisplayFormat.FormatStr = 'dd/mm/yyyy'
          DisplayFormat.Kind = fkDateTime
          FontStyle = [fsx12cpi]
          Frame.Style = fsDot
          Memo.UTF8W = (
            '[DShis_encounter_all_info_all."encounter_date"]')
          ParentFont = False
          TruncOutboundText = False
        end
        object DShis_encounter_all_info_allreferrer_dr: TfrxDMPMemoView
          Left = 124.800000000000000000
          Top = 119.000000000000000000
          Width = 403.200000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          DataField = 'referrer_dr'
          DataSet = DShis_encounter_all_info_all
          DataSetName = 'DShis_encounter_all_info_all'
          FontStyle = [fsx12cpi]
          Frame.Style = fsDot
          Memo.UTF8W = (
            '[DShis_encounter_all_info_all."referrer_dr"]')
          ParentFont = False
          TruncOutboundText = False
        end
        object DShis_encounter_all_info_allphone_1_nr: TfrxDMPMemoView
          Left = 124.800000000000000000
          Top = 187.000000000000000000
          Width = 86.400000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          DataField = 'phone_1_nr'
          DataSet = DShis_encounter_all_info_all
          DataSetName = 'DShis_encounter_all_info_all'
          FontStyle = [fsx12cpi]
          Frame.Style = fsDot
          Memo.UTF8W = (
            '[DShis_encounter_all_info_all."phone_1_nr"]')
          ParentFont = False
          TruncOutboundText = False
        end
        object DMPMemo9: TfrxDMPMemoView
          Left = 211.200000000000000000
          Top = 187.000000000000000000
          Width = 48.000000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          FontStyle = [fsx12cpi]
          Frame.Style = fsDot
          Memo.UTF8W = (
            '  /  ')
          ParentFont = False
          TruncOutboundText = False
        end
        object DShis_encounter_all_info_alladdr_str: TfrxDMPMemoView
          Left = 259.200000000000000000
          Top = 187.000000000000000000
          Width = 508.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          DataField = 'addr_str'
          DataSet = DShis_encounter_all_info_all
          DataSetName = 'DShis_encounter_all_info_all'
          FontStyle = [fsx12cpi]
          Frame.Style = fsDot
          Memo.UTF8W = (
            '[DShis_encounter_all_info_all."addr_str"]')
          ParentFont = False
          TruncOutboundText = False
        end
        object DMPMemo14: TfrxDMPMemoView
          Left = 9.600000000000000000
          Top = 204.000000000000000000
          Width = 758.400000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          FontStyle = [fsx12cpi]
          Frame.Style = fsDot
          Memo.UTF8W = (
            
              '----------------------------------------------------------------' +
              '---------------------------')
          ParentFont = False
          TruncOutboundText = False
        end
        object DMPMemo15: TfrxDMPMemoView
          Left = 9.600000000000000000
          Width = 758.400000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          FontStyle = [fsx12cpi]
          Frame.Style = fsDot
          Memo.UTF8W = (
            
              '----------------------------------------------------------------' +
              '---------------------------')
          ParentFont = False
          TruncOutboundText = False
        end
        object DMPMemo16: TfrxDMPMemoView
          Left = 9.600000000000000000
          Top = 238.000000000000000000
          Width = 489.600000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          FontStyle = [fsx12cpi]
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.UTF8W = (
            '     DESIGNATION')
          ParentFont = False
          TruncOutboundText = False
        end
        object DMPMemo17: TfrxDMPMemoView
          Left = 508.800000000000000000
          Top = 238.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          DataField = 'ins_comb'
          DataSet = DShis_encounter_all_info_all
          DataSetName = 'DShis_encounter_all_info_all'
          FontStyle = [fsx12cpi]
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.UTF8W = (
            '[DShis_encounter_all_info_all."ins_comb"]')
          ParentFont = False
          TruncOutboundText = False
        end
        object DMPMemo18: TfrxDMPMemoView
          Left = 643.200000000000000000
          Top = 238.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          DataField = 'ins2'
          DataSet = DShis_encounter_all_info_all
          DataSetName = 'DShis_encounter_all_info_all'
          FontStyle = [fsx12cpi]
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.UTF8W = (
            '[DShis_encounter_all_info_all."ins2"]')
          ParentFont = False
          TruncOutboundText = False
        end
        object DShis_encounter_all_info_allins_comb: TfrxDMPMemoView
          Left = 124.800000000000000000
          Top = 136.000000000000000000
          Width = 403.200000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          DataField = 'ins_comb'
          DataSet = DShis_encounter_all_info_all
          DataSetName = 'DShis_encounter_all_info_all'
          FontStyle = [fsx12cpi]
          Frame.Style = fsDot
          Memo.UTF8W = (
            '[DShis_encounter_all_info_all."ins_comb"]')
          ParentFont = False
          TruncOutboundText = False
        end
        object DShis_encounter_all_info_allins2: TfrxDMPMemoView
          Left = 124.800000000000000000
          Top = 153.000000000000000000
          Width = 403.200000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          DataField = 'ins2'
          DataSet = DShis_encounter_all_info_all
          DataSetName = 'DShis_encounter_all_info_all'
          FontStyle = [fsx12cpi]
          Frame.Style = fsDot
          Memo.UTF8W = (
            '[DShis_encounter_all_info_all."ins2"]')
          ParentFont = False
          TruncOutboundText = False
        end
      end
      object SejourHeader: TfrxGroupHeader
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        Height = 17.000000000000000000
        ParentFont = False
        Top = 323.000000000000000000
        Width = 777.600000000000000000
        Condition = 'DShis_encounter_invoice_details_sejour."batch_nr"'
        KeepTogether = True
      end
      object SejourMasterData: TfrxMasterData
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        Height = 17.000000000000000000
        ParentFont = False
        Top = 357.000000000000000000
        Width = 777.600000000000000000
        DataSet = DShis_encounter_invoice_details_sejour
        DataSetName = 'DShis_encounter_invoice_details_sejour'
        RowCount = 0
        Stretched = True
        object DShis_encounter_invoice_detailsbatch_date: TfrxDMPMemoView
          Left = 9.600000000000000000
          Width = 96.000000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          FontStyle = [fsx12cpi]
          Frame.Style = fsDot
          Frame.Typ = [ftLeft]
          Memo.UTF8W = (
            
              '[IIF(<DShis_encounter_invoice_details_sejour."category"> = '#39'Sejo' +
              'ur'#39', <DShis_encounter_invoice_details_sejour."batch_date">, '#39#39')]')
          ParentFont = False
          TruncOutboundText = False
        end
        object DShis_encounter_invoice_detailsitem_name: TfrxDMPMemoView
          Left = 105.600000000000000000
          Width = 393.600000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          Frame.Style = fsDot
          Frame.Typ = [ftRight]
          Memo.UTF8W = (
            
              '[IIF(<DShis_encounter_invoice_details_sejour."category"> = '#39'Sejo' +
              'ur'#39', <DShis_encounter_invoice_details_sejour."item_name">, '#39#39')]')
          TruncOutboundText = False
        end
        object DShis_encounter_invoice_detailsprice_ins1: TfrxDMPMemoView
          Left = 508.800000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftRight]
          Memo.UTF8W = (
            
              '[IIF(<DShis_encounter_invoice_details_sejour."category"> = '#39'Sejo' +
              'ur'#39', <DShis_encounter_invoice_details_sejour."price_ins1">, '#39#39')]')
          TruncOutboundText = False
        end
        object DShis_encounter_invoice_detailsprice_ins2: TfrxDMPMemoView
          Left = 643.200000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftRight]
          Memo.UTF8W = (
            
              '[IIF(<DShis_encounter_invoice_details_sejour."category"> = '#39'Sejo' +
              'ur'#39', <DShis_encounter_invoice_details_sejour."price_ins2">, '#39#39')]')
          TruncOutboundText = False
        end
      end
      object SejourGroupFooter: TfrxGroupFooter
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
        Top = 391.000000000000000000
        Width = 777.600000000000000000
      end
      object LabGroupHeader: TfrxGroupHeader
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        Height = 17.000000000000000000
        ParentFont = False
        Top = 476.000000000000000000
        Width = 777.600000000000000000
        Condition = 'DShis_encounter_invoice_details_lab."batch_nr"'
        object DMPMemo23: TfrxDMPMemoView
          Left = 9.600000000000000000
          Width = 96.000000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          Frame.Style = fsDot
          Frame.Typ = [ftLeft]
          Memo.UTF8W = (
            
              '[IIF(<DShis_encounter_invoice_details_lab."category"> = '#39'Laborat' +
              'ory'#39', <DShis_encounter_invoice_details_lab."batch_date">, '#39#39')]')
          TruncOutboundText = False
        end
        object DMPMemo32: TfrxDMPMemoView
          Left = 105.600000000000000000
          Width = 393.600000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          Frame.Style = fsDot
          Frame.Typ = [ftRight]
          TruncOutboundText = False
        end
        object DMPMemo33: TfrxDMPMemoView
          Left = 508.800000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftRight]
          TruncOutboundText = False
        end
        object DMPMemo34: TfrxDMPMemoView
          Left = 643.200000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftRight]
          TruncOutboundText = False
        end
      end
      object LabMasterData: TfrxMasterData
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        Height = 17.000000000000000000
        ParentFont = False
        Top = 510.000000000000000000
        Width = 777.600000000000000000
        DataSet = DShis_encounter_invoice_details_lab
        DataSetName = 'DShis_encounter_invoice_details_lab'
        RowCount = 0
        Stretched = True
        object DMPMemo24: TfrxDMPMemoView
          Left = 105.600000000000000000
          Width = 345.600000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          Frame.Style = fsDot
          Memo.UTF8W = (
            
              '[IIF(<DShis_encounter_invoice_details_lab."category"> = '#39'Laborat' +
              'ory'#39', <DShis_encounter_invoice_details_lab."item_name">, '#39#39')]')
          TruncOutboundText = False
        end
        object DMPMemo25: TfrxDMPMemoView
          Left = 508.800000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight]
          Memo.UTF8W = (
            
              '[IIF(<DShis_encounter_invoice_details_lab."category"> = '#39'Laborat' +
              'ory'#39', <DShis_encounter_invoice_details_lab."price_ins1">, '#39#39')]')
          TruncOutboundText = False
        end
        object DMPMemo26: TfrxDMPMemoView
          Left = 643.200000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftRight]
          Memo.UTF8W = (
            
              '[IIF(<DShis_encounter_invoice_details_lab."category"> = '#39'Laborat' +
              'ory'#39', <DShis_encounter_invoice_details_lab."price_ins2">, '#39#39')]')
          TruncOutboundText = False
        end
        object DMPMemo31: TfrxDMPMemoView
          Left = 9.600000000000000000
          Width = 96.000000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          Frame.Style = fsDot
          Frame.Typ = [ftLeft]
          TruncOutboundText = False
        end
        object DShis_encounter_invoice_details_labcoef_value: TfrxDMPMemoView
          Left = 451.200000000000000000
          Width = 48.000000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          DataSet = DShis_encounter_invoice_details_lab
          DataSetName = 'DShis_encounter_invoice_details_lab'
          Frame.Style = fsDot
          HAlign = haCenter
          Memo.UTF8W = (
            
              '[DShis_encounter_invoice_details_lab."coef_value"] [DShis_encoun' +
              'ter_invoice_details_lab."coef_label"]')
          TruncOutboundText = False
        end
      end
      object LabGroupFooter: TfrxGroupFooter
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
        Top = 612.000000000000000000
        Width = 777.600000000000000000
      end
      object SejourFooter: TfrxFooter
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        Height = 51.000000000000000000
        ParentFont = False
        Top = 408.000000000000000000
        Width = 777.600000000000000000
        object DMPMemo19: TfrxDMPMemoView
          Left = 297.600000000000000000
          Top = 17.000000000000000000
          Width = 201.600000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.UTF8W = (
            'Total [DShis_encounter_invoice_details_sejour."category"]')
          TruncOutboundText = False
        end
        object DMPMemo20: TfrxDMPMemoView
          Left = 9.600000000000000000
          Top = 17.000000000000000000
          Width = 278.400000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          Frame.Style = fsDot
          Frame.Typ = [ftTop, ftBottom]
          TruncOutboundText = False
        end
        object DMPMemo21: TfrxDMPMemoView
          Left = 508.800000000000000000
          Top = 17.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.UTF8W = (
            
              '[SUM(<DShis_encounter_invoice_details_sejour."price_ins1">,Sejou' +
              'rMasterData)]')
          TruncOutboundText = False
        end
        object DMPMemo22: TfrxDMPMemoView
          Left = 643.200000000000000000
          Top = 17.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.UTF8W = (
            
              '[SUM(<DShis_encounter_invoice_details_sejour."price_ins2">,Sejou' +
              'rMasterData)]')
          TruncOutboundText = False
        end
      end
      object LabFooter: TfrxFooter
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        Height = 51.000000000000000000
        ParentFont = False
        Top = 544.000000000000000000
        Width = 777.600000000000000000
        object DMPMemo27: TfrxDMPMemoView
          Left = 297.600000000000000000
          Top = 17.000000000000000000
          Width = 201.600000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.UTF8W = (
            'Total [DShis_encounter_invoice_details_lab."category"]')
          TruncOutboundText = False
        end
        object DMPMemo28: TfrxDMPMemoView
          Left = 9.600000000000000000
          Top = 17.000000000000000000
          Width = 278.400000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          Frame.Style = fsDot
          Frame.Typ = [ftTop, ftBottom]
          TruncOutboundText = False
        end
        object DMPMemo29: TfrxDMPMemoView
          Left = 508.800000000000000000
          Top = 17.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.UTF8W = (
            
              '[SUM(<DShis_encounter_invoice_details_lab."price_ins1">,LabMaste' +
              'rData)]')
          TruncOutboundText = False
        end
        object DMPMemo30: TfrxDMPMemoView
          Left = 643.200000000000000000
          Top = 17.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.UTF8W = (
            
              '[SUM(<DShis_encounter_invoice_details_lab."price_ins2">,LabMaste' +
              'rData)]')
          TruncOutboundText = False
        end
      end
      object RadioGroupHeader: TfrxGroupHeader
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        Height = 17.000000000000000000
        ParentFont = False
        Top = 629.000000000000000000
        Width = 777.600000000000000000
        Condition = 'DShis_encounter_invoice_details_radio."batch_nr"'
        object DMPMemo35: TfrxDMPMemoView
          Left = 9.600000000000000000
          Width = 96.000000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          Frame.Style = fsDot
          Frame.Typ = [ftLeft]
          Memo.UTF8W = (
            
              '[IIF(<DShis_encounter_invoice_details_radio."category"> = '#39'Radio' +
              'logy'#39', <DShis_encounter_invoice_details_radio."batch_date">, '#39#39')' +
              ']')
          TruncOutboundText = False
        end
        object DMPMemo36: TfrxDMPMemoView
          Left = 105.600000000000000000
          Width = 393.600000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          Frame.Style = fsDot
          Frame.Typ = [ftRight]
          TruncOutboundText = False
        end
        object DMPMemo37: TfrxDMPMemoView
          Left = 508.800000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftRight]
          TruncOutboundText = False
        end
        object DMPMemo38: TfrxDMPMemoView
          Left = 643.200000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftRight]
          TruncOutboundText = False
        end
      end
      object RadioMasterData: TfrxMasterData
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        Height = 17.000000000000000000
        ParentFont = False
        Top = 663.000000000000000000
        Width = 777.600000000000000000
        DataSet = DShis_encounter_invoice_details_radio
        DataSetName = 'DShis_encounter_invoice_details_radio'
        RowCount = 0
        Stretched = True
        object DMPMemo39: TfrxDMPMemoView
          Left = 105.600000000000000000
          Width = 345.600000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          Frame.Style = fsDot
          Memo.UTF8W = (
            '[DShis_encounter_invoice_details_radio."item_name"]')
          TruncOutboundText = False
        end
        object DMPMemo40: TfrxDMPMemoView
          Left = 508.800000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight]
          Memo.UTF8W = (
            '[DShis_encounter_invoice_details_radio."price_ins1"]')
          TruncOutboundText = False
        end
        object DMPMemo41: TfrxDMPMemoView
          Left = 643.200000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftRight]
          Memo.UTF8W = (
            '[DShis_encounter_invoice_details_radio."price_ins2"]')
          TruncOutboundText = False
        end
        object DMPMemo42: TfrxDMPMemoView
          Left = 9.600000000000000000
          Width = 96.000000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          Frame.Style = fsDot
          Frame.Typ = [ftLeft]
          TruncOutboundText = False
        end
        object DMPMemo43: TfrxDMPMemoView
          Left = 451.200000000000000000
          Width = 48.000000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          DataSet = DShis_encounter_invoice_details_lab
          DataSetName = 'DShis_encounter_invoice_details_lab'
          Frame.Style = fsDot
          HAlign = haCenter
          Memo.UTF8W = (
            
              '[DShis_encounter_invoice_details_radio."coef_value"] [DShis_enco' +
              'unter_invoice_details_radio."coef_label"]')
          TruncOutboundText = False
        end
      end
      object RadioGroupFooter: TfrxGroupFooter
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
        Top = 697.000000000000000000
        Width = 777.600000000000000000
      end
      object RadioFooter: TfrxFooter
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        Height = 51.000000000000000000
        ParentFont = False
        Top = 714.000000000000000000
        Width = 777.600000000000000000
        object DMPMemo44: TfrxDMPMemoView
          Left = 297.600000000000000000
          Top = 17.000000000000000000
          Width = 201.600000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.UTF8W = (
            'Total [DShis_encounter_invoice_details_radio."category"]')
          TruncOutboundText = False
        end
        object DMPMemo45: TfrxDMPMemoView
          Left = 9.600000000000000000
          Top = 17.000000000000000000
          Width = 278.400000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          Frame.Style = fsDot
          Frame.Typ = [ftTop, ftBottom]
          TruncOutboundText = False
        end
        object DMPMemo46: TfrxDMPMemoView
          Left = 508.800000000000000000
          Top = 17.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.UTF8W = (
            
              '[SUM(<DShis_encounter_invoice_details_radio."price_ins1">,RadioM' +
              'asterData)]')
          TruncOutboundText = False
        end
        object DMPMemo47: TfrxDMPMemoView
          Left = 643.200000000000000000
          Top = 17.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.UTF8W = (
            
              '[SUM(<DShis_encounter_invoice_details_radio."price_ins2">,RadioM' +
              'asterData)]')
          TruncOutboundText = False
        end
      end
      object BlocGroupHeader: TfrxGroupHeader
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        Height = 17.000000000000000000
        ParentFont = False
        Top = 782.000000000000000000
        Width = 777.600000000000000000
        Condition = 'DShis_encounter_invoice_details_bloc."batch_nr"'
        object DMPMemo48: TfrxDMPMemoView
          Left = 9.600000000000000000
          Width = 96.000000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          Frame.Style = fsDot
          Frame.Typ = [ftLeft]
          Memo.UTF8W = (
            '[DShis_encounter_invoice_details_bloc."batch_date"]')
          TruncOutboundText = False
        end
        object DMPMemo49: TfrxDMPMemoView
          Left = 105.600000000000000000
          Width = 393.600000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          Frame.Style = fsDot
          Frame.Typ = [ftRight]
          TruncOutboundText = False
        end
        object DMPMemo50: TfrxDMPMemoView
          Left = 508.800000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftRight]
          TruncOutboundText = False
        end
        object DMPMemo51: TfrxDMPMemoView
          Left = 643.200000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftRight]
          TruncOutboundText = False
        end
      end
      object BlocMasterData: TfrxMasterData
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        Height = 17.000000000000000000
        ParentFont = False
        Top = 816.000000000000000000
        Width = 777.600000000000000000
        DataSet = DShis_encounter_invoice_details_bloc
        DataSetName = 'DShis_encounter_invoice_details_bloc'
        RowCount = 0
        Stretched = True
        object DMPMemo52: TfrxDMPMemoView
          Left = 105.600000000000000000
          Width = 336.000000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          Frame.Style = fsDot
          Memo.UTF8W = (
            '[DShis_encounter_invoice_details_bloc."item_name"]')
          TruncOutboundText = False
        end
        object DMPMemo53: TfrxDMPMemoView
          Left = 508.800000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight]
          Memo.UTF8W = (
            '[DShis_encounter_invoice_details_bloc."price_ins1"]')
          TruncOutboundText = False
        end
        object DMPMemo54: TfrxDMPMemoView
          Left = 643.200000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftRight]
          Memo.UTF8W = (
            '[DShis_encounter_invoice_details_bloc."price_ins2"]')
          TruncOutboundText = False
        end
        object DMPMemo55: TfrxDMPMemoView
          Left = 9.600000000000000000
          Width = 96.000000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          Frame.Style = fsDot
          Frame.Typ = [ftLeft]
          TruncOutboundText = False
        end
        object DMPMemo56: TfrxDMPMemoView
          Left = 441.600000000000000000
          Width = 57.600000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_lab
          DataSetName = 'DShis_encounter_invoice_details_lab'
          Frame.Style = fsDot
          HAlign = haCenter
          Memo.UTF8W = (
            
              '[DShis_encounter_invoice_details_bloc."coef_value"] [DShis_encou' +
              'nter_invoice_details_bloc."coef_label"]')
          TruncOutboundText = False
        end
      end
      object BlocGroupFooter: TfrxGroupFooter
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
        Top = 850.000000000000000000
        Width = 777.600000000000000000
      end
      object BlocFooter: TfrxFooter
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        Height = 51.000000000000000000
        ParentFont = False
        Top = 867.000000000000000000
        Width = 777.600000000000000000
        object DMPMemo57: TfrxDMPMemoView
          Left = 297.600000000000000000
          Top = 17.000000000000000000
          Width = 201.600000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.UTF8W = (
            'Total Bloc Operatoire')
          TruncOutboundText = False
        end
        object DMPMemo58: TfrxDMPMemoView
          Left = 9.600000000000000000
          Top = 17.000000000000000000
          Width = 278.400000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          Frame.Style = fsDot
          Frame.Typ = [ftTop, ftBottom]
          TruncOutboundText = False
        end
        object DMPMemo59: TfrxDMPMemoView
          Left = 508.800000000000000000
          Top = 17.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.UTF8W = (
            
              '[SUM(<DShis_encounter_invoice_details_bloc."price_ins1">,BlocMas' +
              'terData)]')
          TruncOutboundText = False
        end
        object DMPMemo60: TfrxDMPMemoView
          Left = 643.200000000000000000
          Top = 17.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.UTF8W = (
            
              '[SUM(<DShis_encounter_invoice_details_bloc."price_ins2">,BlocMas' +
              'terData)]')
          TruncOutboundText = False
        end
      end
      object PharmaGroupHeader: TfrxGroupHeader
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
        Top = 935.000000000000000000
        Width = 777.600000000000000000
        Condition = 'DShis_encounter_invoice_details_pharma."category"'
      end
      object PharmaMasterData: TfrxMasterData
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        Height = 17.000000000000000000
        ParentFont = False
        Top = 952.000000000000000000
        Width = 777.600000000000000000
        DataSet = DShis_encounter_invoice_details_pharma
        DataSetName = 'DShis_encounter_invoice_details_pharma'
        RowCount = 0
        object Subreport1: TfrxSubreport
          Width = 777.600000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          Page = ReInvoice.Page2
        end
      end
      object PharmaGroupFooter: TfrxGroupFooter
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
        Top = 986.000000000000000000
        Width = 777.600000000000000000
      end
      object FooterPharma: TfrxFooter
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
        Top = 1003.000000000000000000
        Width = 777.600000000000000000
      end
      object DiversGroupHeader: TfrxGroupHeader
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        Height = 17.000000000000000000
        ParentFont = False
        Top = 1020.000000000000000000
        Width = 777.600000000000000000
        Condition = 'DShis_encounter_invoice_details_divers."batch_nr"'
        object DMPMemo76: TfrxDMPMemoView
          Left = 9.600000000000000000
          Width = 96.000000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          Frame.Style = fsDot
          Frame.Typ = [ftLeft]
          Memo.UTF8W = (
            '[DShis_encounter_invoice_details_divers."batch_date"]')
          TruncOutboundText = False
        end
        object DMPMemo77: TfrxDMPMemoView
          Left = 105.600000000000000000
          Width = 393.600000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          Frame.Style = fsDot
          Frame.Typ = [ftRight]
          TruncOutboundText = False
        end
        object DMPMemo78: TfrxDMPMemoView
          Left = 508.800000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftRight]
          TruncOutboundText = False
        end
        object DMPMemo79: TfrxDMPMemoView
          Left = 643.200000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftRight]
          TruncOutboundText = False
        end
      end
      object DiversMasterData: TfrxMasterData
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        Height = 17.000000000000000000
        ParentFont = False
        Top = 1054.000000000000000000
        Width = 777.600000000000000000
        DataSet = DShis_encounter_invoice_details_divers
        DataSetName = 'DShis_encounter_invoice_details_divers'
        RowCount = 0
        Stretched = True
        object DMPMemo84: TfrxDMPMemoView
          Left = 105.600000000000000000
          Width = 393.600000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          Frame.Style = fsDot
          Memo.UTF8W = (
            '[DShis_encounter_invoice_details_divers."item_name"]')
          TruncOutboundText = False
        end
        object DMPMemo85: TfrxDMPMemoView
          Left = 508.800000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight]
          Memo.UTF8W = (
            '[DShis_encounter_invoice_details_divers."price_ins1"]')
          TruncOutboundText = False
        end
        object DMPMemo86: TfrxDMPMemoView
          Left = 643.200000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftRight]
          Memo.UTF8W = (
            '[DShis_encounter_invoice_details_divers."price_ins2"]')
          TruncOutboundText = False
        end
        object DMPMemo91: TfrxDMPMemoView
          Left = 9.600000000000000000
          Width = 96.000000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          Frame.Style = fsDot
          Frame.Typ = [ftLeft]
          TruncOutboundText = False
        end
      end
      object DiversGroupFooter: TfrxGroupFooter
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
        Top = 1088.000000000000000000
        Width = 777.600000000000000000
      end
      object DiversFooter: TfrxFooter
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        Height = 51.000000000000000000
        ParentFont = False
        Top = 1105.000000000000000000
        Width = 777.600000000000000000
        object DMPMemo96: TfrxDMPMemoView
          Left = 297.600000000000000000
          Top = 17.000000000000000000
          Width = 201.600000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.UTF8W = (
            'Total [DShis_encounter_invoice_details_divers."category"]')
          TruncOutboundText = False
        end
        object DMPMemo97: TfrxDMPMemoView
          Left = 9.600000000000000000
          Top = 17.000000000000000000
          Width = 278.400000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          Frame.Style = fsDot
          Frame.Typ = [ftTop, ftBottom]
          TruncOutboundText = False
        end
        object DMPMemo98: TfrxDMPMemoView
          Left = 508.800000000000000000
          Top = 17.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.UTF8W = (
            
              '[SUM(<DShis_encounter_invoice_details_divers."price_ins1">,Diver' +
              'sMasterData)]')
          TruncOutboundText = False
        end
        object DMPMemo99: TfrxDMPMemoView
          Left = 643.200000000000000000
          Top = 17.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.UTF8W = (
            
              '[SUM(<DShis_encounter_invoice_details_divers."price_ins2">,Diver' +
              'sMasterData)]')
          TruncOutboundText = False
        end
      end
      object HonoGroupHeader: TfrxGroupHeader
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        Height = 17.000000000000000000
        ParentFont = False
        Top = 1173.000000000000000000
        Width = 777.600000000000000000
        Condition = 'DShis_encounter_invoice_details_hono_details."batch_nr"'
        object DMPMemo92: TfrxDMPMemoView
          Left = 9.600000000000000000
          Width = 96.000000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          Frame.Style = fsDot
          Frame.Typ = [ftLeft]
          Memo.UTF8W = (
            '[DShis_encounter_invoice_details_hono_details."batch_date"]')
          TruncOutboundText = False
        end
        object DMPMemo100: TfrxDMPMemoView
          Left = 105.600000000000000000
          Width = 393.600000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          Frame.Style = fsDot
          Frame.Typ = [ftRight]
          TruncOutboundText = False
        end
        object DMPMemo101: TfrxDMPMemoView
          Left = 508.800000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftRight]
          TruncOutboundText = False
        end
        object DMPMemo102: TfrxDMPMemoView
          Left = 643.200000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftRight]
          TruncOutboundText = False
        end
      end
      object HonoMasterData: TfrxMasterData
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        Height = 85.000000000000000000
        ParentFont = False
        Top = 1207.000000000000000000
        Width = 777.600000000000000000
        DataSet = DShis_encounter_invoice_details_hono_details
        DataSetName = 'DShis_encounter_invoice_details_hono_details'
        RowCount = 0
        Stretched = True
        object DMPMemo103: TfrxDMPMemoView
          Left = 105.600000000000000000
          Width = 336.000000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          Frame.Style = fsDot
          Memo.UTF8W = (
            '[DShis_encounter_invoice_details_hono_details."item_name"]')
          TruncOutboundText = False
        end
        object DMPMemo104: TfrxDMPMemoView
          Left = 508.800000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight]
          Memo.UTF8W = (
            '[DShis_encounter_invoice_details_hono_details."price_ins1"]')
          TruncOutboundText = False
        end
        object DMPMemo105: TfrxDMPMemoView
          Left = 643.200000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftRight]
          Memo.UTF8W = (
            '[DShis_encounter_invoice_details_hono_details."price_ins2"]')
          TruncOutboundText = False
        end
        object DMPMemo106: TfrxDMPMemoView
          Left = 9.600000000000000000
          Width = 96.000000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          Frame.Style = fsDot
          Frame.Typ = [ftLeft]
          TruncOutboundText = False
        end
        object DMPMemo107: TfrxDMPMemoView
          Left = 441.600000000000000000
          Width = 57.600000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_lab
          DataSetName = 'DShis_encounter_invoice_details_lab'
          Frame.Style = fsDot
          HAlign = haCenter
          Memo.UTF8W = (
            
              '[IIF(<DShis_encounter_invoice_details_hono_details."coef_value">' +
              ' <> 1, <DShis_encounter_invoice_details_hono_details."coef_value' +
              '">, '#39#39')] [DShis_encounter_invoice_details_hono_details."coef_lab' +
              'el"]')
          TruncOutboundText = False
        end
        object DMPMemo108: TfrxDMPMemoView
          Left = 9.600000000000000000
          Top = 17.000000000000000000
          Width = 96.000000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          Frame.Style = fsDot
          Frame.Typ = [ftLeft]
          TruncOutboundText = False
        end
        object DMPMemo115: TfrxDMPMemoView
          Left = 105.600000000000000000
          Top = 34.000000000000000000
          Width = 393.600000000000000000
          Height = 34.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftTop, ftBottom]
          Memo.UTF8W = (
            
              '[IIF(<DShis_encounter_invoice_details_hono_details."coef_label">' +
              ' = '#39'CONS'#39',<DShis_encounter_invoice_details_hono_details."first_k' +
              '">,'#39#39')][IIF(<DShis_encounter_invoice_details_hono_details."coef_' +
              'label"> = '#39'ARE'#39',<DShis_encounter_invoice_details_hono_details."f' +
              'irst_are">,'#39#39')][IIF(<DShis_encounter_invoice_details_hono_detail' +
              's."coef_label"> = '#39'K'#39',<DShis_encounter_invoice_details_hono_deta' +
              'ils."first_k">,'#39#39')]    [IIF(<DShis_encounter_invoice_details_hon' +
              'o_details."coef_label"> = '#39'K'#39',<DShis_encounter_invoice_details_h' +
              'ono_details."first_k_perc">,'#39#39')] [IIF(<DShis_encounter_invoice_d' +
              'etails_hono_details."coef_label"> = '#39'K'#39', '#39'%'#39','#39#39')]'
            
              '[IIF(<DShis_encounter_invoice_details_hono_details."coef_label">' +
              ' = '#39'K'#39',<DShis_encounter_invoice_details_hono_details."second_k">' +
              ','#39#39')]    [IIF(<DShis_encounter_invoice_details_hono_details."coe' +
              'f_label"> = '#39'K'#39',<DShis_encounter_invoice_details_hono_details."s' +
              'econd_k_perc">,'#39#39')] [IIF((<DShis_encounter_invoice_details_hono_' +
              'details."coef_label"> = '#39'K'#39')AND(<DShis_encounter_invoice_details' +
              '_hono_details."second_k_perc"> <> '#39#39'), '#39'%'#39', '#39#39')]')
          TruncOutboundText = True
        end
        object DMPMemo116: TfrxDMPMemoView
          Left = 9.600000000000000000
          Top = 34.000000000000000000
          Width = 96.000000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          Frame.Style = fsDot
          Frame.Typ = [ftLeft]
          TruncOutboundText = False
        end
        object DMPMemo121: TfrxDMPMemoView
          Left = 508.800000000000000000
          Top = 51.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight]
          Memo.UTF8W = (
            
              '[IIF(<DShis_encounter_invoice_details_hono_details."coef_label">' +
              ' = '#39'CONS'#39',<DShis_encounter_invoice_details_hono_details."price_i' +
              'ns1">,'#39#39')][IIF(<DShis_encounter_invoice_details_hono_details."co' +
              'ef_label"> = '#39'ARE'#39',<DShis_encounter_invoice_details_hono_details' +
              '."price_ins1">,'#39#39')][IIF(<DShis_encounter_invoice_details_hono_de' +
              'tails."coef_label"> = '#39'K'#39',<DShis_encounter_invoice_details_hono_' +
              'details."first_k_perc"> * <DShis_encounter_invoice_details_hono_' +
              'details."price_ins1"> /100,'#39#39')]')
          TruncOutboundText = False
        end
        object DMPMemo123: TfrxDMPMemoView
          Left = 508.800000000000000000
          Top = 68.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight]
          Memo.UTF8W = (
            
              '[IIF(((<DShis_encounter_invoice_details_hono_details."coef_label' +
              '"> = '#39'K'#39') AND (<DShis_encounter_invoice_details_hono_details."se' +
              'cond_k_perc"> <> '#39#39')),<DShis_encounter_invoice_details_hono_deta' +
              'ils."second_k_perc"> * <DShis_encounter_invoice_details_hono_det' +
              'ails."price_ins1"> /100,'#39#39')]')
          TruncOutboundText = False
        end
        object DMPMemo120: TfrxDMPMemoView
          Left = 643.200000000000000000
          Top = 51.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftRight]
          Memo.UTF8W = (
            
              '[IIF(<DShis_encounter_invoice_details_hono_details."coef_label">' +
              ' = '#39'CONS'#39',<DShis_encounter_invoice_details_hono_details."price_i' +
              'ns2">,'#39#39')][IIF(<DShis_encounter_invoice_details_hono_details."co' +
              'ef_label"> = '#39'ARE'#39',<DShis_encounter_invoice_details_hono_details' +
              '."price_ins2">,'#39#39')][IIF(<DShis_encounter_invoice_details_hono_de' +
              'tails."coef_label"> = '#39'K'#39',<DShis_encounter_invoice_details_hono_' +
              'details."first_k_perc"> * <DShis_encounter_invoice_details_hono_' +
              'details."price_ins2"> /100,'#39#39')]')
          TruncOutboundText = False
        end
        object DMPMemo122: TfrxDMPMemoView
          Left = 643.200000000000000000
          Top = 68.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftRight]
          Memo.UTF8W = (
            
              '[IIF(((<DShis_encounter_invoice_details_hono_details."coef_label' +
              '"> = '#39'K'#39') AND (<DShis_encounter_invoice_details_hono_details."se' +
              'cond_k_perc"> <> '#39#39')),<DShis_encounter_invoice_details_hono_deta' +
              'ils."second_k_perc"> * <DShis_encounter_invoice_details_hono_det' +
              'ails."price_ins2"> /100,'#39#39')]')
          TruncOutboundText = False
        end
        object DMPMemo61: TfrxDMPMemoView
          Left = 643.200000000000000000
          Top = 17.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftRight]
          TruncOutboundText = False
        end
        object DMPMemo62: TfrxDMPMemoView
          Left = 643.200000000000000000
          Top = 34.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftRight]
          TruncOutboundText = False
        end
        object DMPMemo63: TfrxDMPMemoView
          Left = 508.800000000000000000
          Top = 17.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight]
          TruncOutboundText = False
        end
        object DMPMemo88: TfrxDMPMemoView
          Left = 508.800000000000000000
          Top = 34.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight]
          TruncOutboundText = False
        end
      end
      object HonoGroupFooter: TfrxGroupFooter
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
        Top = 1309.000000000000000000
        Width = 777.600000000000000000
      end
      object HonoFooter: TfrxFooter
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        Height = 51.000000000000000000
        ParentFont = False
        Top = 1326.000000000000000000
        Width = 777.600000000000000000
        object DMPMemo110: TfrxDMPMemoView
          Left = 297.600000000000000000
          Top = 17.000000000000000000
          Width = 201.600000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.UTF8W = (
            'Total Medecins')
          TruncOutboundText = False
        end
        object DMPMemo111: TfrxDMPMemoView
          Left = 9.600000000000000000
          Top = 17.000000000000000000
          Width = 278.400000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          Frame.Style = fsDot
          Frame.Typ = [ftTop]
          TruncOutboundText = False
        end
        object DMPMemo112: TfrxDMPMemoView
          Left = 508.800000000000000000
          Top = 17.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.UTF8W = (
            
              '[SUM(<DShis_encounter_invoice_details_hono_details."price_ins1">' +
              ',HonoMasterData)]')
          TruncOutboundText = False
        end
        object DMPMemo113: TfrxDMPMemoView
          Left = 643.200000000000000000
          Top = 17.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.UTF8W = (
            
              '[SUM(<DShis_encounter_invoice_details_hono_details."price_ins2">' +
              ',HonoMasterData)]')
          TruncOutboundText = False
        end
      end
      object PageFooter1: TfrxPageFooter
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        Height = 153.000000000000000000
        ParentFont = False
        Top = 1411.000000000000000000
        Width = 777.600000000000000000
        object DMPMemo124: TfrxDMPMemoView
          Left = 124.800000000000000000
          Top = 17.000000000000000000
          Width = 374.400000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          Frame.Style = fsDot
          Frame.Typ = [ftRight, ftTop]
          Memo.UTF8W = (
            'Total Facture')
          TruncOutboundText = False
        end
        object DMPMemo125: TfrxDMPMemoView
          Left = 9.600000000000000000
          Top = 17.000000000000000000
          Width = 115.200000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftTop]
          TruncOutboundText = False
        end
        object DMPMemo126: TfrxDMPMemoView
          Left = 508.800000000000000000
          Top = 17.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftTop]
          Memo.UTF8W = (
            
              '[<SUM(<DShis_encounter_invoice_details_sejour."price_ins1">,Sejo' +
              'urMasterData)> + <SUM(<DShis_encounter_invoice_details_lab."pric' +
              'e_ins1">,LabMasterData)> + <SUM(<DShis_encounter_invoice_details' +
              '_radio."price_ins1">,RadioMasterData)> + <SUM(<DShis_encounter_i' +
              'nvoice_details_bloc."price_ins1">,BlocMasterData)> + <SUM(<DShis' +
              '_encounter_invoice_details_pharma."price_ins1">,PharmaDetailMast' +
              'erData)> + <SUM(<DShis_encounter_invoice_details_divers."price_i' +
              'ns1">,DiversMasterData)> + <SUM(<DShis_encounter_invoice_details' +
              '_hono_details."price_ins1">,HonoMasterData)>]')
          TruncOutboundText = False
        end
        object DMPMemo127: TfrxDMPMemoView
          Left = 643.200000000000000000
          Top = 17.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftTop]
          Memo.UTF8W = (
            
              '[<SUM(<DShis_encounter_invoice_details_sejour."price_ins2">,Sejo' +
              'urMasterData)> + <SUM(<DShis_encounter_invoice_details_lab."pric' +
              'e_ins2">,LabMasterData)> + <SUM(<DShis_encounter_invoice_details' +
              '_radio."price_ins2">,RadioMasterData)> + <SUM(<DShis_encounter_i' +
              'nvoice_details_bloc."price_ins2">,BlocMasterData)> + <SUM(<DShis' +
              '_encounter_invoice_details_pharma."price_ins2">,PharmaDetailMast' +
              'erData)> + <SUM(<DShis_encounter_invoice_details_divers."price_i' +
              'ns2">,DiversMasterData)> + <SUM(<DShis_encounter_invoice_details' +
              '_hono_details."price_ins2">,HonoMasterData)>]')
          TruncOutboundText = False
        end
        object DMPMemo128: TfrxDMPMemoView
          Left = 124.800000000000000000
          Top = 34.000000000000000000
          Width = 374.400000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          Frame.Style = fsDot
          Memo.UTF8W = (
            'TVA 10.00 %')
          TruncOutboundText = False
        end
        object DMPMemo129: TfrxDMPMemoView
          Left = 9.600000000000000000
          Top = 34.000000000000000000
          Width = 115.200000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          Frame.Style = fsDot
          Frame.Typ = [ftLeft]
          TruncOutboundText = False
        end
        object DMPMemo130: TfrxDMPMemoView
          Left = 508.800000000000000000
          Top = 34.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Memo.UTF8W = (
            '0.00')
          TruncOutboundText = False
        end
        object DMPMemo131: TfrxDMPMemoView
          Left = 643.200000000000000000
          Top = 34.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftRight]
          Memo.UTF8W = (
            '0.00')
          TruncOutboundText = False
        end
        object DMPMemo132: TfrxDMPMemoView
          Left = 124.800000000000000000
          Top = 51.000000000000000000
          Width = 374.400000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          Frame.Style = fsDot
          Frame.Typ = [ftRight, ftBottom]
          Memo.UTF8W = (
            'Grand Total')
          TruncOutboundText = False
        end
        object DMPMemo133: TfrxDMPMemoView
          Left = 9.600000000000000000
          Top = 51.000000000000000000
          Width = 115.200000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftBottom]
          TruncOutboundText = False
        end
        object DMPMemo136: TfrxDMPMemoView
          Left = 124.800000000000000000
          Top = 85.000000000000000000
          Width = 374.400000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          Frame.Style = fsDot
          Frame.Typ = [ftRight, ftBottom]
          Memo.UTF8W = (
            'Part A Payer 10 %')
          TruncOutboundText = False
        end
        object DMPMemo137: TfrxDMPMemoView
          Left = 9.600000000000000000
          Top = 85.000000000000000000
          Width = 115.200000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftBottom]
          TruncOutboundText = False
        end
        object DMPMemo138: TfrxDMPMemoView
          Left = 508.800000000000000000
          Top = 85.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftBottom]
          Memo.UTF8W = (
            
              '-[(<SUM(<DShis_encounter_invoice_details_sejour."price_ins1">,Se' +
              'jourMasterData)> + <SUM(<DShis_encounter_invoice_details_lab."pr' +
              'ice_ins1">,LabMasterData)> + <SUM(<DShis_encounter_invoice_detai' +
              'ls_radio."price_ins1">,RadioMasterData)> + <SUM(<DShis_encounter' +
              '_invoice_details_bloc."price_ins1">,BlocMasterData)> + <SUM(<DSh' +
              'is_encounter_invoice_details_pharma."price_ins1">,PharmaDetailMa' +
              'sterData)> + <SUM(<DShis_encounter_invoice_details_divers."price' +
              '_ins1">,DiversMasterData)> + <SUM(<DShis_encounter_invoice_detai' +
              'ls_hono_details."price_ins1">,HonoMasterData)>) * 10 /100]')
          TruncOutboundText = False
        end
        object DMPMemo139: TfrxDMPMemoView
          Left = 643.200000000000000000
          Top = 85.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftBottom]
          Memo.UTF8W = (
            
              '[((<SUM(<DShis_encounter_invoice_details_sejour."price_ins1">,Se' +
              'jourMasterData)> + <SUM(<DShis_encounter_invoice_details_lab."pr' +
              'ice_ins1">,LabMasterData)> + <SUM(<DShis_encounter_invoice_detai' +
              'ls_radio."price_ins1">,RadioMasterData)> + <SUM(<DShis_encounter' +
              '_invoice_details_bloc."price_ins1">,BlocMasterData)> + <SUM(<DSh' +
              'is_encounter_invoice_details_pharma."price_ins1">,PharmaDetailMa' +
              'sterData)> + <SUM(<DShis_encounter_invoice_details_divers."price' +
              '_ins1">,DiversMasterData)> + <SUM(<DShis_encounter_invoice_detai' +
              'ls_hono_details."price_ins1">,HonoMasterData)>) * 10 /100) / 150' +
              '7]')
          TruncOutboundText = False
        end
        object DMPMemo140: TfrxDMPMemoView
          Left = 124.800000000000000000
          Top = 119.000000000000000000
          Width = 374.400000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          Frame.Style = fsDot
          Frame.Typ = [ftRight, ftBottom]
          Memo.UTF8W = (
            'Solde A Payer')
          TruncOutboundText = False
        end
        object DMPMemo141: TfrxDMPMemoView
          Left = 9.600000000000000000
          Top = 119.000000000000000000
          Width = 115.200000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smActualHeight
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftBottom]
          TruncOutboundText = False
        end
        object DMPMemo142: TfrxDMPMemoView
          Left = 508.800000000000000000
          Top = 119.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftBottom]
          Memo.UTF8W = (
            '[DShis_encounter_invoice."total_to_pay_first_ins"]')
          TruncOutboundText = False
        end
        object DMPMemo143: TfrxDMPMemoView
          Left = 643.200000000000000000
          Top = 119.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftBottom]
          Memo.UTF8W = (
            '[DShis_encounter_invoice."total_to_pay_second_ins"]')
          TruncOutboundText = False
        end
        object DMPMemo134: TfrxDMPMemoView
          Left = 508.800000000000000000
          Top = 51.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftBottom]
          Memo.UTF8W = (
            
              '[<SUM(<DShis_encounter_invoice_details_sejour."price_ins1">,Sejo' +
              'urMasterData)> + <SUM(<DShis_encounter_invoice_details_lab."pric' +
              'e_ins1">,LabMasterData)> + <SUM(<DShis_encounter_invoice_details' +
              '_radio."price_ins1">,RadioMasterData)> + <SUM(<DShis_encounter_i' +
              'nvoice_details_bloc."price_ins1">,BlocMasterData)> + <SUM(<DShis' +
              '_encounter_invoice_details_pharma."price_ins1">,PharmaDetailMast' +
              'erData)> + <SUM(<DShis_encounter_invoice_details_divers."price_i' +
              'ns1">,DiversMasterData)> + <SUM(<DShis_encounter_invoice_details' +
              '_hono_details."price_ins1">,HonoMasterData)>]')
          TruncOutboundText = False
        end
        object DMPMemo135: TfrxDMPMemoView
          Left = 643.200000000000000000
          Top = 51.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftBottom]
          Memo.UTF8W = (
            
              '[<SUM(<DShis_encounter_invoice_details_sejour."price_ins2">,Sejo' +
              'urMasterData)> + <SUM(<DShis_encounter_invoice_details_lab."pric' +
              'e_ins2">,LabMasterData)> + <SUM(<DShis_encounter_invoice_details' +
              '_radio."price_ins2">,RadioMasterData)> + <SUM(<DShis_encounter_i' +
              'nvoice_details_bloc."price_ins2">,BlocMasterData)> + <SUM(<DShis' +
              '_encounter_invoice_details_pharma."price_ins2">,PharmaDetailMast' +
              'erData)> + <SUM(<DShis_encounter_invoice_details_divers."price_i' +
              'ns2">,DiversMasterData)> + <SUM(<DShis_encounter_invoice_details' +
              '_hono_details."price_ins2">,HonoMasterData)>]')
          TruncOutboundText = False
        end
      end
    end
    object Page2: TfrxDMPPage
      PaperWidth = 210.819863845504600000
      PaperHeight = 296.862308276425900000
      PaperSize = 9
      LeftMargin = 2.539998359584390000
      RightMargin = 2.539998359584390000
      TopMargin = 4.497913761764030000
      BottomMargin = 4.497913761764030000
      MirrorMargins = True
      EndlessHeight = True
      EndlessWidth = True
      LargeDesignHeight = True
      FontStyle = []
      object PharmaDetailGroupHeader: TfrxGroupHeader
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        Height = 17.000000000000000000
        ParentFont = False
        Top = 17.000000000000000000
        Width = 777.600000000000000000
        Condition = 'DShis_encounter_invoice_details_pharma."ligne_name"'
        object DMPMemo68: TfrxDMPMemoView
          Left = 9.600000000000000000
          Width = 96.000000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftTop]
          Memo.UTF8W = (
            '[DShis_encounter_invoice_details_pharma."batch_date"]')
          TruncOutboundText = False
        end
        object DMPMemo69: TfrxDMPMemoView
          Left = 105.600000000000000000
          Width = 393.600000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          Frame.Style = fsDot
          Frame.Typ = [ftRight, ftTop]
          TruncOutboundText = False
        end
        object DMPMemo70: TfrxDMPMemoView
          Left = 508.800000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftRight, ftTop]
          TruncOutboundText = False
        end
        object DMPMemo71: TfrxDMPMemoView
          Left = 643.200000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftRight, ftTop]
          TruncOutboundText = False
        end
      end
      object PharmaDetailGroupFooter: TfrxGroupFooter
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        Height = 51.000000000000000000
        ParentFont = False
        Top = 85.000000000000000000
        Width = 777.600000000000000000
        object DMPMemo72: TfrxDMPMemoView
          Left = 249.600000000000000000
          Top = 17.000000000000000000
          Width = 249.600000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.UTF8W = (
            'Total [DShis_encounter_invoice_details_pharma."ligne_name"]')
          TruncOutboundText = False
        end
        object DMPMemo73: TfrxDMPMemoView
          Left = 9.600000000000000000
          Top = 17.000000000000000000
          Width = 230.400000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          Frame.Style = fsDot
          Frame.Typ = [ftTop]
          TruncOutboundText = False
        end
        object DMPMemo74: TfrxDMPMemoView
          Left = 508.800000000000000000
          Top = 17.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.UTF8W = (
            
              '[SUM(<DShis_encounter_invoice_details_pharma."price_ins1">,Pharm' +
              'aDetailMasterData)]')
          TruncOutboundText = False
        end
        object DMPMemo75: TfrxDMPMemoView
          Left = 643.200000000000000000
          Top = 17.000000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.UTF8W = (
            
              '[SUM(<DShis_encounter_invoice_details_pharma."price_ins2">,Pharm' +
              'aDetailMasterData)]')
          TruncOutboundText = False
        end
      end
      object PharmaDetailMasterData: TfrxMasterData
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        Height = 17.000000000000000000
        ParentFont = False
        Top = 51.000000000000000000
        Width = 777.600000000000000000
        DataSet = DShis_encounter_invoice_details_pharma
        DataSetName = 'DShis_encounter_invoice_details_pharma'
        RowCount = 0
        Stretched = True
        object DMPMemo64: TfrxDMPMemoView
          Left = 105.600000000000000000
          Width = 345.600000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          Frame.Style = fsDot
          Memo.UTF8W = (
            '[DShis_encounter_invoice_details_pharma."item_name"]')
          TruncOutboundText = False
        end
        object DMPMemo65: TfrxDMPMemoView
          Left = 508.800000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight]
          Memo.UTF8W = (
            '[DShis_encounter_invoice_details_pharma."price_ins1"]')
          TruncOutboundText = False
        end
        object DMPMemo66: TfrxDMPMemoView
          Left = 643.200000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftRight]
          Memo.UTF8W = (
            '[DShis_encounter_invoice_details_pharma."price_ins2"]')
          TruncOutboundText = False
        end
        object DMPMemo67: TfrxDMPMemoView
          Left = 9.600000000000000000
          Width = 96.000000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          Frame.Style = fsDot
          Frame.Typ = [ftLeft]
          TruncOutboundText = False
        end
        object DMPMemo87: TfrxDMPMemoView
          Left = 451.200000000000000000
          Width = 48.000000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DataSet = DShis_encounter_invoice_details_lab
          DataSetName = 'DShis_encounter_invoice_details_lab'
          Frame.Style = fsDot
          HAlign = haCenter
          Memo.UTF8W = (
            ' x [DShis_encounter_invoice_details_pharma."qty"]')
          TruncOutboundText = False
        end
      end
      object PharmaDetailFooter: TfrxFooter
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        Height = 34.000000000000000000
        ParentFont = False
        Top = 153.000000000000000000
        Width = 777.600000000000000000
        object DMPMemo80: TfrxDMPMemoView
          Left = 249.600000000000000000
          Width = 249.600000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.UTF8W = (
            'Total [DShis_encounter_invoice_details_pharma."category"]')
          TruncOutboundText = False
        end
        object DMPMemo81: TfrxDMPMemoView
          Left = 9.600000000000000000
          Width = 230.400000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          Frame.Style = fsDot
          Frame.Typ = [ftBottom]
          TruncOutboundText = False
        end
        object DMPMemo82: TfrxDMPMemoView
          Left = 508.800000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.UTF8W = (
            
              '[SUM(<DShis_encounter_invoice_details_pharma."price_ins1">,Pharm' +
              'aDetailMasterData)]')
          TruncOutboundText = False
        end
        object DMPMemo83: TfrxDMPMemoView
          Left = 643.200000000000000000
          Width = 124.800000000000000000
          Height = 17.000000000000000000
          ShowHint = False
          DataSet = DShis_encounter_invoice_details_sejour
          DataSetName = 'DShis_encounter_invoice_details_sejour'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Frame.Style = fsDot
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.UTF8W = (
            
              '[SUM(<DShis_encounter_invoice_details_pharma."price_ins2">,Pharm' +
              'aDetailMasterData)]')
          TruncOutboundText = False
        end
      end
    end
  end
  object DShis_encounter_all_info_all: TfrxDBDataset
    UserName = 'DShis_encounter_all_info_all'
    CloseDataSource = False
    FieldAliases.Strings = (
      'pid=pid'
      'encounter_nr=encounter_nr'
      'encounter_date=encounter_date'
      'encounter_class_nr=encounter_class_nr'
      'referrer_dr=referrer_dr'
      'name=name'
      'triage=triage'
      'admit_type=admit_type'
      'financial_class_nr=financial_class_nr'
      'insurance_nr=insurance_nr'
      'insurance_firm_id=insurance_firm_id'
      'ins_comb=ins_comb'
      'insurance_class_nr=insurance_class_nr'
      'insurance_2_nr=insurance_2_nr'
      'insurance_2_firm_id=insurance_2_firm_id'
      'ins2=ins2'
      'name_first=name_first'
      'name_2=name_2'
      'name_last=name_last'
      'date_birth=date_birth'
      'blood_group=blood_group'
      'sex=sex'
      'addr_str=addr_str'
      'Full Name=Full Name'
      'phone_1_nr=phone_1_nr')
    DataSource = DMPerson.DShis_encounter_all_info_all
    BCDToCurrency = False
    Left = 328
    Top = 528
  end
  object DShis_encounter_invoice_details_bloc: TfrxDBDataset
    UserName = 'DShis_encounter_invoice_details_bloc'
    CloseDataSource = False
    FieldAliases.Strings = (
      
        'his_encounter_invoice_details_id=his_encounter_invoice_details_i' +
        'd'
      'his_encounter_invoice_id=his_encounter_invoice_id'
      'item_id=item_id'
      'item_name=item_name'
      'coef_id=coef_id'
      'coef_label=coef_label'
      'coef_value=coef_value'
      'qty=qty'
      'category=category'
      'batch_nr=batch_nr'
      'batch_date=batch_date'
      'price_ins1=price_ins1'
      'price_ins2=price_ins2'
      'emergency=emergency'
      'private=private'
      'rang=rang'
      'changed=changed')
    DataSource = DMInvoice.DShis_encounter_invoice_details_bloc
    BCDToCurrency = False
    Left = 120
    Top = 624
  end
  object DShis_encounter_invoice_details_divers: TfrxDBDataset
    UserName = 'DShis_encounter_invoice_details_divers'
    CloseDataSource = False
    FieldAliases.Strings = (
      
        'his_encounter_invoice_details_id=his_encounter_invoice_details_i' +
        'd'
      'his_encounter_invoice_id=his_encounter_invoice_id'
      'item_id=item_id'
      'item_name=item_name'
      'coef_id=coef_id'
      'coef_value=coef_value'
      'qty=qty'
      'category=category'
      'batch_nr=batch_nr'
      'batch_date=batch_date'
      'price_ins1=price_ins1'
      'price_ins2=price_ins2'
      'emergency=emergency'
      'private=private'
      'rang=rang'
      'changed=changed')
    DataSource = DMInvoice.DShis_encounter_invoice_details_divers
    BCDToCurrency = False
    Left = 120
    Top = 672
  end
  object DShis_encounter_invoice_details_hono_details: TfrxDBDataset
    UserName = 'DShis_encounter_invoice_details_hono_details'
    CloseDataSource = False
    FieldAliases.Strings = (
      
        'his_encounter_invoice_details_id=his_encounter_invoice_details_i' +
        'd'
      'his_encounter_invoice_id=his_encounter_invoice_id'
      'item_id=item_id'
      'item_name=item_name'
      'coef_id=coef_id'
      'coef_label=coef_label'
      'coef_value=coef_value'
      'qty=qty'
      'category=category'
      'batch_nr=batch_nr'
      'batch_date=batch_date'
      'price_ins1=price_ins1'
      'price_ins2=price_ins2'
      'emergency=emergency'
      'private=private'
      'rang=rang'
      'changed=changed'
      'first_k=first_k'
      'first_k_perc=first_k_perc'
      'second_k=second_k'
      'second_k_perc=second_k_perc'
      'first_are=first_are'
      'first_are_perc=first_are_perc'
      'his_item_encounter_id=his_item_encounter_id')
    DataSource = DMInvoice.DShis_encounter_invoice_details_hono_details
    BCDToCurrency = False
    Left = 120
    Top = 720
  end
  object DShis_encounter_invoice_details_lab: TfrxDBDataset
    UserName = 'DShis_encounter_invoice_details_lab'
    CloseDataSource = False
    FieldAliases.Strings = (
      
        'his_encounter_invoice_details_id=his_encounter_invoice_details_i' +
        'd'
      'his_encounter_invoice_id=his_encounter_invoice_id'
      'item_id=item_id'
      'item_name=item_name'
      'coef_id=coef_id'
      'coef_label=coef_label'
      'coef_value=coef_value'
      'qty=qty'
      'category=category'
      'batch_nr=batch_nr'
      'batch_date=batch_date'
      'price_ins1=price_ins1'
      'price_ins2=price_ins2'
      'emergency=emergency'
      'private=private'
      'rang=rang'
      'changed=changed')
    DataSource = DMInvoice.DShis_encounter_invoice_details_lab
    BCDToCurrency = False
    Left = 328
    Top = 576
  end
  object DShis_encounter_invoice_details_pharma: TfrxDBDataset
    UserName = 'DShis_encounter_invoice_details_pharma'
    CloseDataSource = False
    FieldAliases.Strings = (
      
        'his_encounter_invoice_details_id=his_encounter_invoice_details_i' +
        'd'
      'his_encounter_invoice_id=his_encounter_invoice_id'
      'item_id=item_id'
      'item_name=item_name'
      'qty=qty'
      'category=category'
      'batch_nr=batch_nr'
      'batch_date=batch_date'
      'price_ins1=price_ins1'
      'price_ins2=price_ins2'
      'emergency=emergency'
      'private=private'
      'rang=rang'
      'changed=changed'
      'ligne_name=ligne_name')
    DataSource = DMInvoice.DShis_encounter_invoice_details_pharma
    BCDToCurrency = False
    Left = 328
    Top = 624
  end
  object DShis_encounter_invoice_details_radio: TfrxDBDataset
    UserName = 'DShis_encounter_invoice_details_radio'
    CloseDataSource = False
    FieldAliases.Strings = (
      
        'his_encounter_invoice_details_id=his_encounter_invoice_details_i' +
        'd'
      'his_encounter_invoice_id=his_encounter_invoice_id'
      'item_id=item_id'
      'item_name=item_name'
      'coef_id=coef_id'
      'coef_label=coef_label'
      'coef_value=coef_value'
      'qty=qty'
      'category=category'
      'batch_nr=batch_nr'
      'batch_date=batch_date'
      'price_ins1=price_ins1'
      'price_ins2=price_ins2'
      'emergency=emergency'
      'private=private'
      'rang=rang'
      'changed=changed')
    DataSource = DMInvoice.DShis_encounter_invoice_details_radio
    BCDToCurrency = False
    Left = 329
    Top = 672
  end
  object frxPDFExport1: TfrxPDFExport
    UseFileCache = True
    ShowProgress = True
    OverwritePrompt = False
    DataOnly = False
    PrintOptimized = False
    Outline = False
    Background = False
    HTMLTags = True
    Quality = 95
    Author = 'FastReport'
    Subject = 'FastReport PDF export'
    ProtectionFlags = [ePrint, eModify, eCopy, eAnnot]
    HideToolbar = False
    HideMenubar = False
    HideWindowUI = False
    FitWindow = False
    CenterWindow = False
    PrintScaling = False
    Left = 520
    Top = 528
  end
end
